home *** CD-ROM | disk | FTP | other *** search
/ CD Loisirs 2 / CD Loisirs 02 / CD Loisirs CD 002.mdf / pc / nympheas / sources / s159_020reno.k < prev    next >
Encoding:
Text File  |  1994-01-01  |  1.3 KB  |  91 lines
  1. object S159_020RENO is MEDIADISTRIBUTOR
  2. with
  3.     Duration is -1;
  4.     X is 0; Y is 0; Width is 640; Height is 480;
  5.     Items is [
  6.         S159A6_020_PIC,
  7.         S159A1_S20A_WAV,
  8.         S159A4_BOUTON_DEBUT,
  9.         S159A5_BOUTON_MENU
  10.     ];
  11. end;
  12.  
  13. object S159A6_020_PIC is MEDIADELEGATOR
  14. has
  15.     
  16.     OffScreen()
  17.         do
  18.             self.Run(true);
  19.             TRANSITION.Set(WipeTop, 300);
  20.             self.Show(true);
  21.         end;
  22.     
  23.     Finished()
  24.         do
  25.             S159A1_S20A_WAV.Run(true);
  26.         end;
  27.     
  28. with
  29.     Target is C299_020_PIC;
  30.     Duration is 60;
  31.     X is 0; Y is 0; Width is 640; Height is 480;
  32. end;
  33.  
  34. object S159A1_S20A_WAV is MEDIADELEGATOR
  35. has
  36.     
  37.     OffScreen()
  38.         do
  39.             self.Show(true);
  40.         end;
  41.     
  42.     Finished()
  43.         do
  44.             APPLICATION.GoTo(S160_030VANG);
  45.         end;
  46.     
  47. with
  48.     Target is C317_S20A_WAV;
  49.     Duration is 0;
  50.     X is 217; Y is 146; Width is 32; Height is 24;
  51. end;
  52.  
  53. object S159A4_BOUTON_DEBUT is MEDIADELEGATOR
  54. has
  55.     
  56.     OffScreen()
  57.         do
  58.             self.Enable(true);
  59.             self.Show(true);
  60.         end;
  61.     
  62.     MouseUp(theX, theY)
  63.         do
  64.             APPLICATION.GoBack(MEDIADISTRIBUTOR0);
  65.         end;
  66.     
  67. with
  68.     Duration is -1;
  69.     X is 538; Y is 433; Width is 91; Height is 35;
  70. end;
  71.  
  72. object S159A5_BOUTON_MENU is MEDIADELEGATOR
  73. has
  74.     
  75.     OffScreen()
  76.         do
  77.             self.Enable(true);
  78.             self.Show(true);
  79.         end;
  80.     
  81.     MouseUp(theX, theY)
  82.         do
  83.             APPLICATION.GoTo(S30_021REME);
  84.         end;
  85.     
  86. with
  87.     Duration is -1;
  88.     X is 538; Y is 390; Width is 90; Height is 35;
  89. end;
  90.  
  91.